﻿Imports ACSeguridad

Public Class Encriptacion

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      Try
         Dim _seg As New ACValidarUsuario()
         TextBox3.Text = _seg.getStringEncrypt(TextBox1.Text, TextBox2.Text, ACTypeAlgorithm.csAlgorithmPassMd5New)

      Catch ex As Exception
         Throw ex
      End Try
   End Sub
End Class